Pascal Super Library/Pascal Super Library (CW International)(1997).bin/DELPHI32/GRIDS/MSTRGRID/MSTRDEM_.DFM/MSTRDEM_.txt

Text File | 1996-06-17 | 7KB | 349 lines

object Form1: TForm1
  Left = 435
  Top = 105
  Width = 631
  Height = 433
  Caption = 'Form1'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 312
    Width = 27
    Height = 13
    Caption = 'Rows'
  end
  object Label2: TLabel
    Left = 8
    Top = 280
    Width = 40
    Height = 13
    Caption = 'Columns'
  end
  object Label3: TLabel
    Left = 56
    Top = 264
    Width = 23
    Height = 13
    Caption = 'At all'
  end
  object Label4: TLabel
    Left = 120
    Top = 264
    Width = 25
    Height = 13
    Caption = 'Fixed'
  end
  object AbbruchBtn: TBitBtn
    Left = 568
    Top = 376
    Width = 51
    Height = 25
    Caption = '&Bye'
    TabOrder = 9
    OnClick = AbbruchBtnClick
    Kind = bkAbort
  end
  object Key_Type: TRadioGroup
    Left = 8
    Top = 344
    Width = 81
    Height = 57
    Caption = 'KeyType'
    ItemIndex = 0
    Items.Strings = (
      'String'
      'Case Sens'
      'Numeric')
    TabOrder = 4
    OnClick = Key_TypeClick
  end
  object RowCnt: TSpinEdit
    Left = 56
    Top = 312
    Width = 41
    Height = 22
    MaxValue = 0
    MinValue = 0
    TabOrder = 1
    Value = 0
    OnChange = RowCntChange
  end
  object ColCnt: TSpinEdit
    Left = 56
    Top = 280
    Width = 41
    Height = 22
    MaxValue = 0
    MinValue = 0
    TabOrder = 0
    Value = 0
    OnChange = ColCntChange
  end
  object SaveBtn: TButton
    Left = 576
    Top = 336
    Width = 41
    Height = 25
    Caption = 'Save'
    TabOrder = 8
    OnClick = SaveBtnClick
  end
  object loadBtn: TButton
    Left = 528
    Top = 336
    Width = 43
    Height = 25
    Caption = 'Reload'
    Default = True
    TabOrder = 7
    OnClick = loadBtnClick
  end
  object Panel1: TPanel
    Left = 440
    Top = 256
    Width = 177
    Height = 73
    TabOrder = 3
    object InsCol: TButton
      Left = 8
      Top = 8
      Width = 57
      Height = 25
      Caption = 'Ins Cols'
      Default = True
      TabOrder = 0
      OnClick = InsColClick
    end
    object InsRow: TButton
      Left = 8
      Top = 40
      Width = 57
      Height = 25
      Caption = 'Ins Rows'
      TabOrder = 3
      OnClick = InsRowClick
    end
    object DelCol: TButton
      Left = 112
      Top = 8
      Width = 57
      Height = 25
      Caption = 'Del Cols'
      TabOrder = 1
      OnClick = DelColClick
    end
    object DelRow: TButton
      Left = 112
      Top = 40
      Width = 57
      Height = 25
      Caption = 'Del Rows'
      TabOrder = 4
      OnClick = DelRowClick
    end
    object Anz: TSpinEdit
      Left = 72
      Top = 27
      Width = 33
      Height = 22
      MaxValue = 0
      MinValue = 0
      TabOrder = 2
      Value = 1
    end
  end
  object Panel2: TPanel
    Left = 168
    Top = 336
    Width = 313
    Height = 65
    TabOrder = 6
    object Search: TEdit
      Left = 8
      Top = 5
      Width = 65
      Height = 20
      TabOrder = 0
      Text = 'Kiel'
    end
    object Nextbtn: TButton
      Left = 262
      Top = 32
      Width = 43
      Height = 25
      Caption = 'Next'
      Enabled = False
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = NextbtnClick
    end
    object FindBtn: TButton
      Left = 8
      Top = 32
      Width = 65
      Height = 25
      Caption = 'Find'
      Default = True
      TabOrder = 3
      OnClick = FindBtnClick
    end
    object Substring_Search: TCheckBox
      Left = 184
      Top = 8
      Width = 121
      Height = 17
      Caption = 'Search Substring'
      TabOrder = 2
      OnClick = Substring_SearchClick
    end
    object RowWise: TCheckBox
      Left = 80
      Top = 8
      Width = 97
      Height = 17
      Caption = 'Search Rowwise'
      State = cbChecked
      TabOrder = 1
      OnClick = RowWiseClick
    end
    object FindZeile: TButton
      Left = 158
      Top = 32
      Width = 75
      Height = 25
      Caption = 'Find in Row'
      TabOrder = 5
      OnClick = FindZeileClick
    end
    object FindSpalte: TButton
      Left = 78
      Top = 32
      Width = 75
      Height = 25
      Caption = 'Find in Column'
      TabOrder = 4
      OnClick = FindSpalteClick
    end
  end
  object Use_fixed: TRadioGroup
    Left = 96
    Top = 344
    Width = 65
    Height = 57
    Caption = 'Use Fixed'
    Items.Strings = (
      'No'
      'Smart'
      'Yes')
    TabOrder = 5
    OnClick = Use_fixedClick
  end
  object Panel3: TPanel
    Left = 168
    Top = 256
    Width = 265
    Height = 73
    TabOrder = 2
    object SpaltenSortBtn: TBitBtn
      Left = 8
      Top = 8
      Width = 97
      Height = 25
      Caption = 'Sort complete cols'
      Default = True
      TabOrder = 0
      OnClick = SpaltenSortBtnClick
    end
    object ZeilenSortBtn: TButton
      Left = 8
      Top = 40
      Width = 97
      Height = 25
      Caption = 'Sort complete rows'
      TabOrder = 3
      OnClick = ZeilenSortBtnClick
    end
    object SortRows: TButton
      Left = 110
      Top = 40
      Width = 83
      Height = 25
      Caption = 'Sort every Row'
      TabOrder = 4
      OnClick = SortRowsClick
    end
    object SortCols: TButton
      Left = 112
      Top = 8
      Width = 81
      Height = 25
      Caption = 'Sort every Col'
      TabOrder = 1
      OnClick = SortColsClick
    end
    object SortThisRow: TButton
      Left = 200
      Top = 40
      Width = 59
      Height = 25
      Caption = 'Sort Row'
      TabOrder = 5
      OnClick = SortThisRowClick
    end
    object SortThisCol: TButton
      Left = 200
      Top = 8
      Width = 59
      Height = 25
      Caption = 'Sort Col'
      TabOrder = 2
      OnClick = SortThisColClick
    end
  end
  object FixCol: TSpinEdit
    Left = 112
    Top = 280
    Width = 41
    Height = 22
    MaxValue = 0
    MinValue = 0
    TabOrder = 11
    Value = 0
    OnChange = FixColChange
  end
  object FixRow: TSpinEdit
    Left = 112
    Top = 312
    Width = 41
    Height = 22
    MaxValue = 0
    MinValue = 0
    TabOrder = 10
    Value = 0
    OnChange = FixRowChange
  end
  object mStrGrid1: TmStrGrid
    Left = 8
    Top = 8
    Width = 609
    Height = 241
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goTabs]
    TabOrder = 12
    KeyType = soString
    KeyPos = 1
    KeyLen = 2147483647
    UseFixed = hfNot
    SearchSubstring = False
  end
end